Simulation 1

Data structure: \(O = (W, A, Z, Y)\)

  • U - exogenous variables
  • W - baseline covariate that is a measure of body condition
  • A - treatment level based on W, continuous between 0 and 5
  • Z - intermediate curve based on W and A
  • Y - outcome, indicator of an event ?

Underlying data generating process, \(P_{U,X}\)

  • Exogenous variables:
    • \(U_A \sim Normal(\mu=0, \sigma^2 = 1^2)\)
    • \(U_A \sim Normal(\mu=0, \sigma^2 = 2^2)\)
    • \(U_Z \sim Uniform(min = 0, max = 1)\)
    • \(U_Y \sim Uniform(min = 0, max = 1)\)
  • Structural equations F and endogenous variables:
    • \(W = U_W\)
    • \(A = bound(2 - 0.5W + U_A, min=0, max=5)\)
    • \(Z = \mathbf{I}[U_Z < expit(2-W-A)]\)
    • \(Y = \mathbf{I}[U_Y < expit(- 8 + W + 5A + Z - 0.5WA)]\)
##        W                  A                Z                Y         
##  Min.   :-3.70910   Min.   :0.0000   Min.   :0.0000   Min.   :0.0000  
##  1st Qu.:-0.64504   1st Qu.:0.5905   1st Qu.:0.0000   1st Qu.:0.0000  
##  Median : 0.01777   Median :2.0236   Median :0.0000   Median :1.0000  
##  Mean   : 0.01700   Mean   :2.1328   Mean   :0.4812   Mean   :0.5999  
##  3rd Qu.: 0.68726   3rd Qu.:3.4446   3rd Qu.:1.0000   3rd Qu.:1.0000  
##  Max.   : 4.38319   Max.   :5.0000   Max.   :1.0000   Max.   :1.0000
## Summary of A given W < -1:
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   0.000   1.536   2.852   2.783   4.196   5.000
## Summary of A given -1 < W <= 0:
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##  0.0000  0.8294  2.2677  2.3031  3.6384  5.0000
## Summary of A given 0 < W <= 1:
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##  0.0000  0.4088  1.8176  1.9511  3.1383  5.0000
## Summary of A given 1 < W:
##    Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
##   0.000   0.000   1.199   1.547   2.664   5.000

n = 200

CV HAL

results

## CV selected lambda (from one sample): 0.00669857527625325

1000 repetition

## The average of CV selected lambdas (from 1000 sample): 0.00805702593800398
## z=1:

## z=0:

Globally Undersmoothed HAL

results

## Undersmoothed lambda: 0.0015646006085061
##  which is 0.233572146909012 * lambda_CV

1000 repetition

## The average of unsersmoothed lambda (from 1000 sample): 0.00198368858974991
##  which is 0.250550122058336 * the average of 1000 lambda_CV
## z=1:

## z=0:

Globally Undersmoothed HAL with min local lambda

results

## Undersmoothed lambda: 0.00444575727955356
##  which is 0.112883789168469 * lambda_CV

1000 repetition

## The average of unsersmoothed lambda (from 1000 sample): 0.00326832681443788
##  which is 0.250550122058336 * the average of 1000 lambda_CV
## z=1:

## z=0:

Undersmoothing?

## z=1:

## z=0:

Oevr a grid of lambda scalers

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                 grob
## 1 1 (2-3,2-3) arrange       gtable[layout]
## 2 2 (4-5,1-2) arrange       gtable[layout]
## 3 3 (4-5,3-4) arrange       gtable[layout]
## 4 4 (6-7,1-2) arrange       gtable[layout]
## 5 5 (6-7,3-4) arrange       gtable[layout]
## 6 6 (3-3,4-4) arrange    gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.9183]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                 grob
## 1 1 (2-3,2-3) arrange       gtable[layout]
## 2 2 (4-5,1-2) arrange       gtable[layout]
## 3 3 (4-5,3-4) arrange       gtable[layout]
## 4 4 (6-7,1-2) arrange       gtable[layout]
## 5 5 (6-7,3-4) arrange       gtable[layout]
## 6 6 (3-3,4-4) arrange    gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.9520]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                 grob
## 1 1 (2-3,2-3) arrange       gtable[layout]
## 2 2 (4-5,1-2) arrange       gtable[layout]
## 3 3 (4-5,3-4) arrange       gtable[layout]
## 4 4 (6-7,1-2) arrange       gtable[layout]
## 5 5 (6-7,3-4) arrange       gtable[layout]
## 6 6 (3-3,4-4) arrange    gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.9857]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.10194]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.10531]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.10868]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.11205]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.11542]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.11879]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.12216]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.12553]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.12890]

n = 500

CV HAL

results

## CV selected lambda (from one sample): 0.00304915463126771

1000 repetition

## The average of CV selected lambdas (from 1000 sample): 0.00377951842511137
## z=1:

## z=0:

Globally Undersmoothed HAL

results

## Undersmoothed lambda: 0.000239285449803067
##  which is 0.0784759970351461 * lambda_CV

1000 repetition

## The average of unsersmoothed lambda (from 1000 sample): 0.000976521442732073
##  which is 0.257085741491311 * the average of 1000 lambda_CV
## z=1:

## z=0:

Globally Undersmoothed HAL with min local lambda

results

## Undersmoothed lambda: 0.000444569278197184
##  which is 0.0545559478116852 * lambda_CV

1000 repetition

## The average of unsersmoothed lambda (from 1000 sample): 0.00135401788120607
##  which is 0.257085741491311 * the average of 1000 lambda_CV
## z=1:

## z=0:

Undersmoothing?

## z=1:

## z=0:

Oevr a grid of lambda scalers

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.21980]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.22317]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.22654]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.22991]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.23328]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.23665]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.24002]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.24339]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.24676]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.25013]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.25350]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.25687]

n = 1000

CV HAL

results

## CV selected lambda (from one sample): 0.00191686388481646

1000 repetition

## The average of CV selected lambdas (from 1000 sample): 0.00202632875883968
## z=1:

## z=0:

Globally Undersmoothed HAL

results

## Undersmoothed lambda: 0.000216382858638274
##  which is 0.112883789168469 * lambda_CV

1000 repetition

## The average of unsersmoothed lambda (from 1000 sample): 0.00052662050700697
##  which is 0.247063528738697 * the average of 1000 lambda_CV
## z=1:

## z=0:

Globally Undersmoothed HAL with min local lambda

results

## Undersmoothed lambda: 0.000579627763925871
##  which is 0.0784759970351462 * lambda_CV

1000 repetition

## The average of unsersmoothed lambda (from 1000 sample): 0.000714273739996091
##  which is 0.247063528738697 * the average of 1000 lambda_CV
## z=1:

## z=0:

Undersmoothing?

## z=1:

## z=0:

Oevr a grid of lambda scalers

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.34777]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.35114]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.35451]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.35788]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.36125]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.36462]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.36799]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.37136]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.37473]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.37810]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.38147]

## TableGrob (7 x 4) "arrange": 7 grobs
##   z     cells    name                  grob
## 1 1 (2-3,2-3) arrange        gtable[layout]
## 2 2 (4-5,1-2) arrange        gtable[layout]
## 3 3 (4-5,3-4) arrange        gtable[layout]
## 4 4 (6-7,1-2) arrange        gtable[layout]
## 5 5 (6-7,3-4) arrange        gtable[layout]
## 6 6 (3-3,4-4) arrange     gtable[guide-box]
## 7 7 (1-1,1-4) arrange text[GRID.text.38484]